(:
  A procedure to select the contents of the "chat" interventions
:)
declare boundary-space strip;
import module namespace
    jj = "http://kumquat.emse.fr/utilitaires"
    at "jjutils.xq" ; 


<display>{

let $infoname := $arguments[2]
let $infovalue := $arguments[3]
let $t := $arguments[1]

for $item in doc($t)/display/item 
	where some $info in $item/info satisfies $info/@name = $infoname and $info/text()=$infovalue
	return $item


}</display>
